local sString;
local t = Def.ActorFrame{
	
	LoadFont("Common normal")..{
		InitCommand=cmd(shadowlength,1);
		SetMessageCommand=function(self,param)
			if param.StepsType then
				sString = THEME:GetString("StepsDisplay StepsType",ToEnumShortString(param.StepsType));
				if param.Steps and param.Steps:IsAutogen() then
					self:diffusebottomedge(color("0.75,0.75,0.75,1"));
				else
					self:diffuse(Color("White"));
				end;
				self:settext( sString );
			end;
		end;
	};

};

return t;